home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / COOLVIEW.ZIP / VIEW50_3.ASM < prev    next >
Assembly Source File  |  1995-03-04  |  943b  |  51 lines

  1. ; View 50-lines screen in Text Mode
  2. ; Coded '95 by Paradise, 1995.III.3
  3. ; Lublin, Poland
  4. ; paradise@bachus.umcs.lublin.pl
  5. ;
  6. ; Example : OBJ file example
  7. ;
  8. ; Need : piccy.inc (converted from bin file by BIN2INC.EXE)
  9. ;
  10. ; Compile : tasm view50_3.asm
  11. ;
  12.  
  13. Public Body
  14. ; procedure to show piccy on the screen
  15.  
  16. Code  SEGMENT PARA PUBLIC 'CODE'
  17.       ASSUME CS:Code, DS:Code
  18.       Org 100h
  19.  
  20. Body  PROC FAR
  21.       ; set 400 scan lines
  22.       mov ax, 1202h
  23.       mov bl, 30h
  24.       int 10h
  25.       ; set text mode
  26.       mov ax, 3h
  27.       int 10h
  28.       ; load 8x8 font
  29.       mov ax, 1112h
  30.       mov bl, 0
  31.       int 10h
  32.       ; move screen from data
  33.       push ds
  34.       push cs
  35.       pop ds
  36.       mov si, offset Piccy
  37.       mov dx, 0b800h
  38.       mov es, dx
  39.       xor di, di
  40.       mov cx, 4000
  41.       cld
  42.       rep movsw
  43.       pop ds
  44.       ret
  45. Body  ENDP
  46.  
  47. Piccy LABEL WORD
  48. include piccy.m
  49.  
  50. Code  ENDS
  51.       END Body